home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PsL Monthly 1999 June
/
PSL Volume 7 Number 6.iso
/
educa
/
win
/
lang_art
/
PPUNCH30.ZIP
/
DEMO.ZIP
/
PUNCH.EXE
/
0
/
RCDATA
/
TGAMEF
/
TGAMEF.txt
< prev
Wrap
Text File
|
1998-03-18
|
13KB
|
330 lines
object GameF: TGameF
Left = 0
Top = 308
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
BorderIcons = [biSystemMenu, biMinimize]
AutoScroll = False
Caption = 'Punch'
ClientHeight = 120
ClientWidth = 632
Color = 8454143
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIForm
Icon.Data = {<image000.ico>}
KeyPreview = True
Visible = True
WindowState = wsMinimized
OnClose = FormClose
OnKeyDown = FormKeyDown
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 632
Height = 41
Align = alTop
Color = clSilver
TabOrder = 0
object HelpB: TSpeedButton
Left = 8
Top = 8
Width = 53
Height = 25
Caption = '&Help'
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333332233
3333333333333FF3333333330000333333324423333333333333388F33333333
00003333333A22433333333333338F38F3333333000033333333A22333333333
33338FF8F3333333000033333333333333333333333338833333333300003333
3333446333333333333333FF3333333300003333333222433333333333333888
F333333300003333333A22433333333333338F38F333333300003333333A2224
3333333333338F38F3333333000033333333A2224333333333338F338F333333
0000333333333A2224333333333338F338F3333300003333344333A222433333
333F338F338F3333000033332224333A224333333388F338F338F33300003333
A22244422243333338F38FFF8338F333000033333A2222222223333338F33888
3338F3330000333333AA222222333333338FF33333383333000033333333AAAA
A333333333388FFFFF8333330000333333333333333333333333388888333333
0000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = False
OnClick = HelpBClick
end
object ExitB: TSpeedButton
Left = 61
Top = 8
Width = 49
Height = 25
Caption = 'E&xit'
Glyph.Data = {
BE060000424DBE06000000000000360400002800000024000000120000000100
0800000000008802000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C0007F7F7F00F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000E0E0E000A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0003F8F8F8F8F8
F8F8F8F80707FF07FF07F807FFF8F8F8F8F8F8F8F8F8F8030303030303FF0404
0404040000F8F8F8FFFFFF0404040404F8F8F8F8F8F8F8F8F8F8FF030303FFFF
F8FF0303030304FD05000007FFFFFF0403030303F8F8F8F8F8F8F8F8F8F80303
03F8F8F8F8FF030303030405FD0500FFFFFFFF040303030303030303F8FFF8F8
F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF040303030303030303
F8F807F8F8FF030303F8FF0303FF030303030405FD0500FFFEFFFE0403030303
03030303F8FFF807F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF04
0303030303030303F8F807F8F8FF030303F8FF0303FF030303030405FD0500FF
FEFFFE040303030303030303F8FFF807F8FF030303F8FF0303FF0303030304FD
05FD00FFFFFFFF040303030303030303F8F807F8F8FF030303F8FF0303FF0303
03030405FD0500FFFEFFFE040303030303030303F8FFF807F8FF030303F8FF03
03FF0303030304FD05FD00FEFFFEFF040303030303030303F8F807F8F8FF0303
03F8FF0303FF030303030405FD0500FFFEFFFE040303030303030303F8FFF807
F8FF030303F8FF0303FF0303030304FD05FD00FEFFFEFF040303030303030303
F8F807F8F8FF030303F8FF0303FF030303030404040404040404040403030303
03030303F8FFF8FFF8FFFFFFFFF8FF0303FF0303030303030303030303030303
0303030303030303F8F8F8F8F8F8F8F8F8F8030303FF03030303030300000000
000003030303030303030303030303FFFFFFFFFFFF03030303FF030303030303
00FAFAFAFA00030303030303030303030303F8F8F8F8F8F8FF03030303FF0303
03030303000000000000030303030303030303030303F8FFFFFFFFF8FF030303
03FF}
NumGlyphs = 2
ParentShowHint = False
ShowHint = False
OnClick = ExitBClick
end
object Image2: TImage
Left = 362
Top = 8
Width = 80
Height = 28
AutoSize = True
end
object Label2: TLabel
Left = 446
Top = 12
Width = 3
Height = 16
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Serif'
Font.Style = []
ParentFont = False
end
object GraphicB: TSpeedButton
Left = 110
Top = 8
Width = 67
Height = 25
Hint = 'Turn graphics off'
Caption = '&Graphic'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
0000377777777777777703030303030303037F7F7F7F7F7F7F7F000000000000
00007777777777777777933393303933337073F37F37F73F3377393393303393
379037FF7F37F37FF777379793303379793037777337F3777737339933303339
93303377F3F7F3F77F3733993930393993303377F737F7377FF7399993303399
999037777337F377777793993330333393307377FF37F3337FF7333993303333
993033377F37F33377F7333993303333993033377337F3337737333333303333
33303FFFFFF7FFFFFFF700000000000000007777777777777777030303030303
03037F7F7F7F7F7F7F7F000000000000000077777777777777770000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = GraphicBClick
end
object SoundB: TSpeedButton
Left = 177
Top = 8
Width = 61
Height = 25
Hint = 'Turn sound off'
Caption = 'Soun&d'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333FFF3333F333333300033339333333337773F33733333330008033
933333333737F7F37333333307078733333933337337373F3337333077088803
33933337F37F337F3373333077088803393333F7337FF37F3733300777008803
9333377F33773F7F733307088808087333337F7F337F7F7F3FFF070777080873
99997F7F337F7F7F77770808880808733333737F337F737F3F33300888008803
93333773F377337F73F333308807880339333337F37F337F373F333088077803
339333373F73F37333733333087777333339333373F7F7F33F37333330807033
933333333737F73373F3333333000333393333333377733337330000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = SoundBClick
end
object ReviewB: TSpeedButton
Left = 238
Top = 8
Width = 66
Height = 25
Caption = 'Re&view'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
3333333777333777FF33339993707399933333773337F3777FF3399933000339
9933377333777F3377F3399333707333993337733337333337FF993333333333
399377F33333F333377F993333303333399377F33337FF333373993333707333
333377F333777F333333993333101333333377F333777F3FFFFF993333000399
999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
99933773FF777F3F777F339993707399999333773F373F77777F333999999999
3393333777333777337333333999993333333333377777333333}
NumGlyphs = 2
ParentShowHint = False
ShowHint = False
OnClick = ReviewBClick
end
object TopicB: TSpeedButton
Left = 304
Top = 8
Width = 56
Height = 25
Caption = '&Topic'
Enabled = False
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
333333333337FF3333333333330003333333333333777F333333333333080333
3333333333777F3333333333330003333333333333777F3333333333330F0333
33333333337F7F3333333333330F033333333333337373F33333333330F7F033
333333333737F73F333333330FF7FF03333333337F37F37F333333330FF7FF03
333333337F37337F333333330FFFFF033333333373F333733333333330FFF033
33333333373FF733333333333300033333333333337773333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333333333333333333333333333333333333333333333333330000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = False
OnClick = TopicBClick
end
object TextB: TSpeedButton
Left = 360
Top = 8
Width = 51
Height = 25
Caption = 'T&ext'
Enabled = False
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555FFFFFFFFFF5555550000000000555557777777777F5555550FFFFFFFF
0555557F5FFFF557F5555550F0000FFF0555557F77775557F5555550FFFFFFFF
0555557F5FFFFFF7F5555550F000000F0555557F77777757F5555550FFFFFFFF
0555557F5FFFFFF7F5555550F000000F0555557F77777757F5555550FFFFFFFF
0555557F5FFF5557F5555550F000FFFF0555557F77755FF7F5555550FFFFF000
0555557F5FF5777755555550F00FF0F05555557F77557F7555555550FFFFF005
5555557FFFFF7755555555500000005555555577777775555555555555555555
55555555555555555555555555555555555555555555555555550000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = False
Visible = False
OnClick = TextBClick
end
end
object SectionP: TPanel
Left = 0
Top = 100
Width = 632
Height = 20
Align = alBottom
BevelInner = bvLowered
Color = clGray
TabOrder = 1
object SectionsL2: TLabel
Left = 21
Top = 4
Width = 2
Height = 13
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Serif'
Font.Style = []
ParentFont = False
end
object Image1: TImage
Left = 1
Top = 1
Width = 16
Height = 16
Picture.Data = {<image001.bmp>}
end
object SectionsL1: TLabel
Left = 20
Top = 3
Width = 2
Height = 13
Font.Color = clWhite
Font.Height = -12
Font.Name = 'MS Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
end
object MediaPlayer1: TMediaPlayer
Left = 0
Top = 40
Width = 253
Height = 30
DeviceType = dtWaveAudio
Visible = False
TabOrder = 2
end
object GameT: TTimer
Interval = 300000
OnTimer = GameTTimer
Left = 256
Top = 40
end
end